PROG/80 

Dedicated to the serious programmer 



SEPTEMBER 1979 
$3.00 



l : :; : :i 



■Un. 





1 
1 










■Hi 




>l80D 




! Micklus' 
ST80-the Smart 
Terminal Program- 
just got SMARTER!! 




ST80D contains extensions for disk 
drive systems to exchange files with a 
timesharing computer or another TRS-80. 



USING ST80D, your TRS-80 can do all this and more: 

Gather and pre-format data, store it on disk, then 
transmit it to a timesharing computer for processing. 
Processed data from the timesharing computer can 
then be sent back to the TRS-80. 

One TRS-80 can generate a data base and share it with 
another TRS-80 thousands of miles away by telephone. 

Users may customize their terminal program by 
redefining the translation tables. Conversion from one 
set of tables to another takes only seconds. 

Auto logon feature sends your account name, number 
and password upon request. 

ST80D can transmit any type of TRS-80 ASCII file, 
including BASIC programs stored in ASCII format, and 
most BASIC data files. Binary files can also be 
transmitted from one TRS-80 to another, allowing even 
machine language programs to be sent over the phone. 

ST80D is a practical, full-feature terminal program that 
has been used on a variety of timesharing systems. 

These include IBM 370, Honeywell Sigma/6, Harris/7, 
DECSYSTEM 20, Dartmouth Timesharing, CDC Cyber 
and HP 2000. 

If you're looking for a professional quality product, 
not an amateur program, then order ST80D today! 
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PLEASE NOTE: 

Our new Watts Line v 

number is*;;: '■:':■.'■■ ■ 

1-800-258-1790 

It is ONLY to be used for 
ordering software. 

Programmers will not be 
available on this line. 

The Watts Lino will be 
open from: 

9:00 a.m. to 9:00 p.m.* 



ALSO... 

During normal business 
hours, programmers will 
ONI Y be available from 

9-10 a.m. and 5-6 p.m.* 

673-5144 



New HOTLINE Hours- 
Tuesday Nights 
7-10 p.m. * 

673-5144 



Your Cooperation Will Be 
Most Appreciated 
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Warning to Disk Users! 

You should never turn your system ON or OFF with a diskette in the 
drive. Even turntng the drive itself on or off can create an electronic 
pulse at the write head and spoil a diskette. To protect your diskettes, 
remove them before turning any part of the system off. When your turn 

on the computer, do it in this order: 

1) Expansion Interface 

2) Printer 

3) Computer ' 
' 4) Screen 

5) Disk Drives 

Only after everything is on should you load your diskettes and press 
the RESET button in order to load the Disk Operating System. 

Radio Shack announced several months ago that diskettes were to 
be removed prior to shutting down the computer, but only recently 
have problems been verified when turning the system on. To be ab- 
solutely save, never turn any part of the system on or off with a 
diskette in the drive. {Note: It will not harm your disk drive to run empty 
on power up.) 



CORRECTION! 



In the July issue of PROG/80 there are a couple of errors (Cassette 
Controller) that may contuse the unwary. First, in two places in the text 
the author states that the meter is placed In series between the CPU and 
the CTR-41. Not sol And not shown as such in the schematics, which are 
properly shown with the meter In parallel across the line. The VU meter 
is a sensitive AC voltmeter, and is rectifying dc pulses for an average 
reading. 

Note aiso that Figure 4 has a wiring error, although the text is correct- 
ly stated. The dpdt switch (lower), will effectively short the output of the 
CTR-41 when connected to the right side position as viewed. In addition, 
the "ground" shielded lead from the speaker which should go to the 
switch is "floating". 
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In the TRS-80 world, the United States is made up of three 
sections: the east coast, the west coast, and Texas. The hardest 
place to get to seems to be Texas, especially Fort Worth. At times it 
seems like Radio Shack is in a vacuum. 

Those of us who make our living in computer software have 
discovered certain needs. Yet, our cries for help do not seem to be 
heard in the great Texas vacuum. 

To write software for a mass market, you need to write it for 
some sort of standard system, especially if you are using a disk 
system. Many disk system owners have never used a computer 
before. Getting them to do a simple task such as reading a directory 
is a major accomplishment. 

We have learned, the hard way, that disk software must be 
complete. It should be ready to be put in the drive and run. Anyone 
who has tried to distribute software on a user-FORMATTED disk 
(no DOS) has found that many users get totally baffled just trying to 
copy the files to their own disks. 

The fact of the matter is, first, that we software people need a 
good DOS we know everybody will have and can use. Second, we 
need an arrangement to include the DOS on our own disks. Sadly, 
we have neither. 

In the first case, there is NEWDOS, TRSDOS 2.2, DOS 3.0, 
MICRODOS, TRSCPM, MMSFORTH, and PASCAL. Some of 
these DOS systems are unique to themselves. Others are variations 
of a basic theme. Most software people I know are planning to 
distribute on TRSDOS 2.2 because it is assumed that everybody 
owns a copy of it. 

Obviously, this brings us to the second problem. I know of 
several software houses who have received notices from Radio 
Shack lawyers regarding the illegal use of TRSDOS 2.2. 
Specifically, they sold their products with TRSDOS 2.2 included on 
the disks, minus some of the utility programs. 

Those of us who write software do not want to violate the rights 
of others. But we need to survive. If we could get a license 
arrangement with Radio Shack, I think we would all be glad to pay 
up and legally use the TRSDOS 2.2, rather than use it without 
Shack's permission and bank on the fact that copyright violations 
are hard to enforce. 

Such an arrangement would make TRSDOS 2.2 the standard, 
solving our first problem. In addition, the extra money Radio Shack 
and Microsoft got could be used to further upgrade TRSDOS into 
the excellent operating system it was. meant to be. 

So, please Radio Shack, stop sending us legal notices. Make us a 
reasonable offer to use your DOS. We won't refuse. 
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shipping and handling. Order yours today! 
TRS-80 SOFTWARE EXCHANGE 
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Introducing... 

MMSFOFTH 



THE LATEST IN A HIGH-LEVEL LANGUAGE SOFTWARE 
DEVELOPMENT SYSTEM. 

OK 

MMSFORTH is a new version of the powerful, fast, and 
structured FORTH language, specifically written for the 
ok TRS-80, and offers such features as: 

OK 

• Double precision integer math 

• Reverse polish notation 

• Blinking cursor, auto-repeat keyboard 

• Virtual Memory! 

• Editing capabilities similar to Level II 

• Supports Z-80 assembly blocks within the FORTH 

structure 

OK 

MMSFORTH is available in two versions; a complete version for 
disk systems and a close approximation to that version which is 
designed for the Level II, 16K tape system. The disk version 
offers "virtual memory", supports one to four disk drives, does 
not require any other disk operating system, and also has both 
disk and tape input/output capabilities. 

TAKE ADVANTAGE OF A POWERFUL STRUCTURED 
LANGUAGE WITH THE EXECUTION SPEED OF A 

ok COMPILER. 

ok MMSFORTH is available now Irom TSE. 



mmsfdfthV 

The MMSFORTH system diskette or 
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cassette tape provides for the expansion of 
FORTH commands by the user. There are 
many programs and routines provided as 
examples of FORTH programming, such as: 

Routines For: Programs For: 

String Handling Game of Life 

Graphics Checkbook Balancing 

File Sorting String Sort 

Screen Printing Number Guessing Game 

The TRS-80 Software Exchange intends to fully support the 
introduction of MMSFORTH with the development of 
supporting application modules. Early MMSFORTH projects 
are: 

floating-point package • 

assembler /cross compiler to provide • 

standard TRS-80 load modules 

large flexible mailing list system • 

generalized data base management system • 

word-processing package (FORTHWRITE) • 



MMSFORTH, by Miller Microcomputer Services, includes 
introductory documentation with further references to the 
MicroFORTH primer of FORTH, Inc. This manual is an 
invaluable reference for the FORTH programmer, and can be 
purchased separately by anyone desiring more information on 
the FORTH language structure. 

30-DAY INTRODUCTORY PRICE 

MMSFORTH cassette version, Level II, 16K $34.95 

MMSFORTH disk version, Level II, 16K 65 00 

MicroFORTH primer 15.00 



TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 



* 



> 



9 




Written by the author of your Level I Users Manual, LEARNING 
LEVEL II picks right up where the Level t Manual leaves off. It also 
supplies the changes needed to make the Level I Manual compatible 
with your Level II TRS-80. 

LEARNING LEVEL II covers all Level II BASIC beyond Level I, plus 
much more. It shows you how to use the Editor, explains what the 
many error messages are really saying, and leads you thru conver- 
sions of Level I programs to Level II. 

Dual cassettes, printers, the Expansion Interface with clock and 
other features are explained in the same easy-to-learn style that 
made the Level I Manual famous. LEARNING LEVEL II was created 
specifically for your Level II TRS-80! 



" 



Yes, I want to really learn how to use Level II! 



Please sand copies of 

LEARNING LEVEL II. My check for $15.95 + 
$1.45 P S H is enclosed. (CA addresses add 
6% sales tax). 



I understand my order will be shipped 
promptly and there is a 30 day money-back 
guarantee, g.. 95 

s> 13 (soft cover) 



Name 

Address _ 

City 

State 
Zip Code 



.TRS-80 

^OFTWARE 6 SOUTH STREET 

EXCHANGE milford, nh 03055 
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THE 

MEAN 

Checkers Machine 



by Lance Mkklus 






mmm 



TRS-80 SOFTWARE 
EXCHANGE 

6 SOUTH STREET 

MILFORD, NH 03055 



Our resident wizard has done if again! Designed in FORTRAN, fun 
as machine language, this program turns your TRS-80 into an 
unbelievably wicked checker player* Four levels of play; at the 
most difficult, the machine may take ten minutes per move, as it 
attempts to assess all possibilities. MEAN CHECKERS MACHINE 
is to checkers what SARGON is to chess. (Level 4 is an exercise in 
humility!) 

Level II, 16K $19.95 

Disk $24.95 



DOS 



by Lance Micklus 



An interesting thing happened on my way to TSE to buy some 
PERCOM disk drives. I think I found out why DOS has so much trouble 
with "LOST DATA" errors. Let me tell you a story. 

Back in October 1978, when ! got my first Radio Shack disk drive, i 
began to get LOST DATA errors. So, I thought I would play with the 
drive to see if I could Improve the situation. I played. No more LOST 
DATA errors. I still had some of the other problems common to 
TRSDOS 2.1, but I always worked my way around them. 

For example; after I used a disk for a while, i would copy all of the 
files to a clean DOS disk. 

For the most part, I had very little trouble with TRSDOS 2.1 and 
always thought that the problems others had must be hardware 
related. 

While I was watting for my second Radio Shack drive, I used several 
other types given to me on loan, particularly four VISTA 80 drives 
which were terrible. I had to adjust all of them, especially the motor 
speed. Two of the VISTA 80 drives were In such bad condition (they 
were new, yet!) that i couldn't get them to run at all. Two others I 
babied along. 

A couple of months ago, my second Radio Shack drive finally came. 
It, too, needed some adjustment. The head alignment was not set up 
correctly. And, in spite of all i did, it would not read disks created by 
its oider brother. 

I got a scope, and played with both drives for a couple of days. 
Finally, I got them to work fairly well. One thing I did discover was that 
my motor speed was set too fast. It turned out this was a major 
discovery, but I didn't know it at the time. 

Now a strange thing happened, i started getting those darn LOST 
DATA errors. At this point, TRSDOS 2.2 was out, DOS 3.0 was on order, 
and l had NEWDOS+ sitting on a shelf. I decided to live with the 
problem a few more days until TRSDOS 2.2 or DOS 3.0 got here. I 
didn't want to change DOS systems until I had one 1 knew I would like. 

TRSDOS 2.2 was a disappointment, ft did not have the features in it 
I thought It was going to have, it also did not cure my LOST DATA er- 
rors. 
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I took a long overdue trip to the TRS-80 Software Exchange In 
Milford, New Hampshire and brought myRadio Shack drives with me. 
The folks at TSE have been bragging about those PERCOMS, and i 
needed a third drive for my system. After using the PERCOMS at TSE, 
I struck up a good deal, and traded my Shack drives for the PERCOMS. 
When 1 got home, I fired up the PERCOMS and just fell in love with 
them. But i was still getting those LOST DATA errors. 

It was time to fix this problem once and for all. I made one small 
change to TRSDOS 2.2, and since then, t have not seen a single LOST 
DATA error. 

Before I tell you what I did, let me first explain what a LOST DATA 
error is. When you are going to read a sector on a disk, you must first 
position the head over the correct track, then tell the disk controller 
which sector you want to read. Now you issue a read command to the 
disk control. 

Next, you enter a loop. There are flags you can test to see how the 
read operation is going. One of the flags Is a DRIVE BUSY signal. This 
means that the disk drive is still doing something and can not accept 
any new commands. The other flag is DATA REQUEST. When on, it 
means that there Is one byte from the disk that is ready for the DOS to 
get and put into memory. 

The game Is to get bytes from the drive and put them In memory, as 
they become available, until the drive is no longer BUSY. Then you are 
done. 

The DOS does not have a lot of time to fool around. Bytes from the 
drive are ready every 78 millionths of a second. 

In the expansion Interface is a clock which creates a special signal 
called an interrupt. The signal is sent 40 times a second. When the 
TRS-80 gets an interrupt signal, It stops whatever it is doing, and goes 
off to do the Interrupt tasks. This includes updating the clock, chang- 
ing the TRACE, the test for the BREAK key if DEBUG is on, etc. All of 
this takes a fair amount of time. Whan all of the Interrupt tasks have 
been completed, the TRS-80 goes back to doing what it was doing 
before, as if nothing had happened. 

What happens if an Interrupt occurs while you are reading a sector 
from the disk? It takes so long for the TRS-80 to do the interrupt tasks 
that by the time it gets back to reading the disk again, bytes will have 
been missed. You've got to get them while they're there. When you 
miss bytes because the TRS-80 was busy doing something else, then 
the data you've read from the disk is in error because you have LOST 
some of the DATA. 

The DOS handles a LOST DATA error in a very simple way. It just 
tries to read the sector again. Hopefully, the next time around, the in- 
terrupts won't interfere with the READ operation. In TRSDOS 2.2, the 
DOS will try 10 times to reread the disk, then It gives up and displays 
the error message LOST DATA, 

You would think, Radio Shack thought, after 10 tries, you should be 
able to get it. I mean 10 tries should be enough. 

WRONG!!! I !! ! Radio Shack, you dummy, haven't you ever heard of 
MURPHY'S LAW? 
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W turns out that the speed of the disk drive motor Is almost in 
perfect sync with the interrupts. If you get a LOST DATA error, more 
than likely the same thing will happen again next time until the inter- 
rupts slowly get out of step with the READ operations. 

When I had my disk drive motors running at the wrong speed (too 
fast) the Interrupts got out of sync with the READ operations very 
quickly - in less than 10 tries. But when I set the speed back to the cor- 
rect RPM, the interrupts now were in sync; it took more than 10 tries 
before they got out of sync, and i got LOST DATA errors. 

I guess one way to fix this problem Is to set the speed of your disk 
drives up a little faster. But that's a very poor way to do things. 

The second fix is much better. When a LOST DATA error occurs, 
Just go back and read the sector again, and again, and again . . . 
forever . . . until you get it right, in practice, most reads will not be 
bothered by the interrupts. On those rare occasions when the inter- 
rupts do cause LOST DATA errors, they will work themselves out of 
sync within a few seconds. 

The third solution Is to disable the interrupts entirely. This is done 
by a CMD'T* in Disk BASIC. But then your clock, Debug, TRACE, etc., 
won't work -• if any of that Is important to you. 

As for myself, I use interrupt-sup ported features on my system. So, 
the second solution seemed to be the way to go. Here's the way to do 
It. 

From BASIC POKE 18107, 202. You only have to do this once after 
you BOOT the system, i.e., load TRSDOS 2.2. Do not use this POKE on 
any other DOS except TRSDOS 2.2. 

Let me warn you of something right now. After you make this POKE 
into your TRSDOS 2.2, for a while you are going to get scared. Occa- 
sionally, the drive will just sit there and spin. Sometimes, for as long 
as 5 seconds. Then, it will kick in and go on like nothing happened. 
Don't worry. Everything is fine. It's just MURPHY'S LAW proving to the 
world that it also operates in Fort Worth, Texas. 

There are some other interesting POKES you might want to try out. 
Especially if you have PERCOM, VISTA 80, or some other non-Radio 
Shack drive. These POKES step up the access speed. (I'm running my 
PERCOMS at 10 millisecond access speed, and. they work just fine. 
But Instead of purring like a cat, they buzz like a saw when the head 
moves!) Experiment with the following values of X and Y. If you have a 
Radio Shack drive, try these POKES out anyway. I found that some 
Radio Shack drives will work fine at faster access speeds than they 
are specified for. 

For 20 millisecond access, use the following values: 
X = 18and Y=2 

For 10 millisecond access, use these values of X and Y: 

X = 17andY = 1 

14 



Now for the POKE addresses. 

NEWDOS: POKE 18007.X and POKE 17484,Y 

TRSDOS 2.2: POKE 18007,X and POKE 18122.Y 

DOS 3.0: POKE 17746.X and POKE 17856, Y 

I hope to have ready, very soon, a patch program to make these 
changes a permanent part of the DOS. It is more a matter of finding 
the time to sit down and work it out. 

The biggest stumbling block right now has been DOS 3.0 by Randy 
Cook. If I am unable to get the patch worked out for his DOS, I will skip 
it and figure it out some other time. 

In the meantime, try these changes out. I prefer you don't call me on 
the phone because I can't afford the time to talk to all of you. But, I 
would like a letter or post card (with pictures of beach girls) letting me 
know how these changes worked out for you. A few scribbled lines will 
do fine. Here's my address: 

. . Lance Micklus 

217 South Union Street 
■..■■■ Burlington, Vermont 05401 • 



WARNING TO DISK USERS! 

You should never turn your system ON or OFF with a diskette 
in the drive. Even turning the disk drive on or off can create an 
electronic pulse at the write head and spoil a diskette. To pro- 
tect your diskettes, remove them before turning any part of the 
system off. When you turn on the computer, do it in this order: 

1) Expansion Interface 2) Printer 3) Computer 4) Screen 
5) Disk Drives. 

Only after everything is on should you load your diskettes and 
press the RESET button in order to load the Disk Operating 
System. 

Radio Shack announced several months ago that diskettes 
were to be removed prior to shutting down the computer, but 
only recently have problems been verified when turning the 
system on. To be absolutely safe, never turn any part of the 
system on or off with a diskette in the drive. (Note: It will not 
harm your disk drive to run empty on power up.) 
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Computers are 
Kids'Stuff 



by Michael Potts 



If you're looking for a reason to buy a small computer- or you did it 
already and are feeling guilty - and you have school-age children, I'm 
here to tell you that you did the right thing. Educationally, computers 
are the biggest breakthrough since moveable type! Who else but a 
computer has the patience and precision to drill a kid on his math 
facts until he's got them cold? Where else can a child find an attentive 
respondent to help with spelling or geometry or physics? The chal- 
lenge for you, the owner of a small system: there's very little decent 
teaching software. Your knowledge of what your child needs help 
with, your programming skill, and your micro can meet the challenge. 
Our motto is, "making better children is our most important work." 

My job Is teaching eight-year-olds In a Montessori school; my 
classroom helper is a Radio Shack TRS-80 purchased by a school 
fund-raising drive two years ago - and as far as I'm concerned, TRS-80 
is the best help I could hire. I also work with the other teachers at 
Kinderhaus to develop programming which other children, as young 
as four, can use to help master acquired skills. Our experience shows 
that children approach the computer, after their first reluctance, with 
joy and unusual focus; they work through recess, into lunch periods, 
past the end of school despite the fact that our programs require them 
to learn constantly. I suspect that a child who has the good fortune of 
access to a computer running good educational software at home will 
get a rich education and maintain a healthy hunger for learning. The 
key, of course, is the software. I'd like to help you get started. 

We've reviewed all the software that we could find that's intended 
for children, and find a general lack of a firm theoretical foundation, a 
tendency to talk down to the kids, and a confusion of new rules 
peculiar to each program which stand in the way of the child's learn- 
ing the real meat of the intended lesson. It's no surprise to me that our 
use of Maria Montessori's principles makes the lessons in our pro- 
grams easily accessible to children. Before I dive into the Montessori 
dogma, though, I want to make a big point: teaching kids is a pretty 
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common-sense undertaking; If you know how to present a subject 
without contradicting yourself, you'll be OK, but If you can't unders- 
tand why anybody would want to learn a given lesson, you're not ready 
to teach it. The first requirement of good education is clarity on the 
part of the teacher - a clear grasp of substance and goal. The main 
goal of a Montessori lesson Is independence - giving the child the 
tools to solve a problem by himself. 

This mainspring of the Montessori approach applies elegantly to 
the writing of educational software: as programmer and system 
operator, I want to be able to start a child on a program, and back off, 
allowing the child to enter into a dialogue with the machine, free from 
adult intervention. Here is where the machine works its magic ■ it is 
uncritical, patient, unflappable, and so the child expands to full poten- 
tial without fear of disapproval. I'm left free to write the next program, 
or prepare the kind of original presentation that comes best from a 
person, or pursue my own education (so that I can stay a step ahead 
of the speedy little creatures). Or so I can just sit back and observe the 
child weaving through the intricate web I've woven, watch the won- 
drous process of learning, anticipate the surprises I've built in, and en- 
joy the operation of that wonderful creation, the computer. 

THE FIRST TIME 

How do you start a child on the right path? You assume that the 
child has never played with a computer, and take that as your first 
lesson. The best teacher would be another child with lots of computer 
experience - adults talk too much, explain the wrong things, are too 
quick to Intervene, give right answers, push buttons. If there's no ex- 
pert kid around, start yours out on something really easy, well within 
her ability, so that success with the material is assured, and she can 
use her mastery of the subject to explore the machine . . . what does it 
do if I give the wrong answer? What does It think the right answer Is? 
Does it know everything? What does it do if I punch in nonsense? Can 
it teach me anything I don't already know? We use a simple counting 
routine for our youngest children; we can scale it down so that a child 
who can distinguish between 1 and 2 'beads' on the screen can start 
to play with the computer. With these youngsters (age 3 to 4) you must 
remember to keep the lesson short and the display very simple, 
because if they can't count past three, reading 'yes' and 'no' Is pro- 
bably about as far as you can take them. Even children as old as 10 en- 
joy this program if it has some score-keeping and perhaps a timing 
aspect that forces them to count fast or recognize patterns. 
Remember: If the main lesson is "know your computer", keep the sub- 
ject matter simple. 
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A common false start turns a testing program (What's the capitol of 
North Dakota? Quick !i) or an arbitrary game ("You have been vaporiz- 
ed by a laser cannon; Princess Leia weeps for you.") loose on an in- 
secure kid and he is devastated by the machine's mastery. Although 
both kinds of programming have value, they do not belong anywhere 
near the beginning of a child's computer experience: build confidence 
first. 

MOVING ON - A REAL TEACHING PROGRAM 

Our child has time to build a good relationship with our machine! 
From here on we must always remember our chief goal, independence 
for the child, and our main priority, the kid comes first. The child's 
education and continued enjoyment of the process are crucial, while 
the machine is an elegant tool, a fast Idiot. Lessons must be rigorous 
and accurate, so that we won't have anything we're sorry for later. And 
they must start out well within the realm of possibility for the child. It 
is very sad to see a child, eager to play the machine, lose enthusiasm 
and self-contentment when the machine produces problem after pro- 
blem of unsolvable work. A careful scaling segment at the top of 
the program, even before the child is invited to the console, must 
tailor the problems precisely to the ability of the child - this requires 
sensitivity on the part of the operator. 

When the child does come to the computer, let the machine interact 
and do the talking - independence, remember. Our machine starts out: 

HELLO. THIS PROGRAM MAKES UP ADDITION 
PROBLEM S. WHAT SHALL I CALL YOU? 

and the child types in a name: 

R2D2 

(and delights in the interaction between 
fingers and display, and by the fact that 
the machine will call her anything she 
wants.) 

OK, R2D2, DO YOU NEED INSTRUCTIONS? 



i) The capitol of North Dakota is Bismarck; Nevada's capitol is Carson City, 
and Delaware's is Dover. Aren't you glad you know? 
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Given a 'YES' the program leads the child through a step-by-step 
dialogue explaining exactly what will happen, what is expected of the 
child, and what help Is available if the child gets stuck. Great care by 
the programmer in anticipating difficulties, and In writing at the 
child's level without talking down, will make the process much easier 
for the child . . . here is a place where education can happen. A fine 
balance between wordiness and comprehensiveness must be main- 
tained. If the child doesn't understand, she will get "stumped" later, 
and have to resort to adult help; we don't want to compromise her rela- 
tionship with the machine. We want to give her independence as early 
as we can <so she can support us in our old age). 

The main program is usually the simplest part, tt should be pretty 
and very, very clear. Computer output at its tamest Is almost too much 
for kids; where concentration Is needed the distractions should be 
kept to a dull roar. Our program presents only this (in large print): 

R2D2 (something the child can relate to easily) 

123 

+ 045 

?? 

After the child has concentrated, and provided tie right answer, she 
deserves, and will enjoy, some glitter and flash: 

YES YES YES YES YES YES YES YES YES YES YE 
S YES!!! 123 + 45 =168 
YOU HAVE GOTTEN 7 OUT OF 9 RIGHT, R2D2, 
HERE COMES ANOTHER ONE . . . 

and make it go by so fast she has to learn to sort out the Important in- 
formation from the garbage she doesn't want to see - a little lesson In 
preparation for real life. 

What if she gets the wrong answer? Here comes another little-used 
but most important program segment; the machine leaves the name, 
problem, and wrong answer on the screen and asks: 

DO YOU WANT HELP? 

Answered In the negative, the screen clears, the problem is restated 
exactly as before, and the machine awaits another attempt. Answered 
in the affirmative . . . 
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THE HELP SEGMENT 

The fun begins. When you write the HELP segment, you must 
transport yourself back to childhood and remember all the mistakes 
you made, and then design a concise and compassionate procedure 
for getting through the problem without making them. How did you 
learn to carry? Was it the best way? Most important: How is your kid 
being taught at school? (If there's any doubt or misunderstanding, ask 
your chi Id's teacher - before you try to help, be sure that you don't add 
to the confusion.) 

In our Kinderhaus Addition Program we follow Maria Montessori's 
careful procedure, digit by digit, through the computational jungle. 
The child's name remains as a talisman of familiarity, and the pro- 
blem is manipulated so that each consecutive process is Isolated 
exactly as we want the child to do on paper or in her head. The pro- 
gram Insists on the right answer at each step, and offers more and 
more careful help until the problem is found. For example, given the 
sub-problem 7 + 8 in the units column: 



R2D2 

UNITS 


1 2 
+ 29 


7 
B 




HOW MANY UNITS? 16 


COUNT THEM, R2D2: 


7H3@(3@@@S 
8©®(§iSI!®S@. 


HOW MANY UNITS? 



(sample display) 
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And then the routine goes through the same song-and-dance for the 
tens and hundreds (If any). 

There are two points to this: first, make sure that the child knows 
the procedure precisely and exhaustively, so that mistakes will be 
minimized In future; second, make the process of resorting to the 
computer for help so picayune that it becomes much easier for the 
child to grab paper and pencil and have a go at the problem inde- 
pendently. 

The simple expedient (to wallow for a moment in redundancy) of let- 
ting the kid get a problem wrong three times, then regale him with the 
answer, is good data processing, but it's lousy education. Who cares 
what the answer is: how do you get it? Many educators object to com- 
puter-education for precisely this (software based) reason: if the kids 
can always get the machine to do their work, they'll never learn 
anything on their own. If you've watched a kid with one of the Texas 
Instrument teaching calculators (or their equivalents) you've seen how 
quickly they get the trick to finding the answers without thought. A 
program without a help segment is Just an expensive toy. Put it 
another way: without good instructions, good tailoring of the 
problems to the individual kid, and a genuinely helpful HELP segment, 
I don't think you have educational programming. 

SCORING AND ENDGAME 

Our programs expect a child to complete a set of problems - 15 
works well on our 16-llne display - before she can stop. This gives a 
reluctant learner enough repetition so that the concept sticks, and 
gives any child a nice sense of task-completion. (Our motivated kids 
love to zip through 5 pages or, better yet, send the machine's memory 
into overload.) At the end of each set, or page, the machine should of- 
fer some reward: 

*** R2D2'S SCORE *** 

YOU HAVE DONE 15 PROBLEMS AND GOTTEN 14 RIGHT 
FOR A SCORE OF 93%, 

WELL DONE, R2D2I 

(this only if the score's better than 90%) 

DO YOU WANT MORE? 

Answered affirmatively, the machine cranks out another set, perhaps 
slightly more difficult. If the child Is tired, here Is retreat with honor, 
and the machine's work is well done. 

A good place to use the machine's memory is here at the end: a 
record of the problems the child has attacked, and her results, can 
help an adult spot areas where some explanation and drill can correct 
procedure. Our program generates a code during the HELP segment 
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which reads out with the record of problems and pinpoints difficulties 
the child had in getting through the mechanics. This makes it much 
easier to spot simple confusions, like the sum of 7 + 8, which In- 
validate a complex calculation. A homebrew version of this program 
should include at least the score and review segments because they 
provide the kid with welt-earned reward, and the adult with valuable In- 
sight into how to scale the program next time it's used. 

And that's the best part: once you've got the program up and runn- 
ing, It can help a kid from elementary facts like 2 + 3 at age 5 to 
5-digit mind-benders at age 15; the kid who survives will be fluent In 
addition. 

MOVING RIGHT ALONG 

The same care must go into other teaching programs. A multiplica- 
tion program might drill facts (like 6*8©?) only, stress mastery by 
timing the response and giving a readout at completion of each pro- 
blem, and offer help by reviewing the appropriate times-table upon re- 
quest. Another multiplication program could lead the child through 
the jungle of dynamic double-digit multiplication. Similar programs 
would help in subtraction and division. We've adapted similar ap- 
proaches to spelling and grammar. The fact is that any symbolic pro- 
cess which requires repetition and correction for mastery will benefit 
from computer instruction - the programmer's time and ingenuity are 
the only limitations; even a Level I Basic 4K memory TRS-80 can han- 
dle a lot of teaching. 

Practical skills -estimation and measurement, time-telling, change- 
making, games based on simple computation and judgment of odds - 
build incredible facility in their devotees. My kids have a favorite call- 
ed the 10-by-10 Graph Game, which allows the child to assemble block 
graphics on the screen by specifying a cell's coordinates (you 
remember you x's and y's). The machine fills it in (or given a negative, 
erases It.) Even six-year-olds grasp the concept and spend hours 
building patterns far more precise and orderly than their developing 
motor skills would permit on paper: the machine's absolute obedience 
and uncritical execution provide a perfect chance for what Maria 
Montessori called the "key experience" of ordering the universe. 
When the child needs coordinate geometry at some later date it will 
seem like (if you'll pardon the expression) child's play. 

Logic games - tic-tac-toe against the computer, number-guessers, 
Frogs, even Chess at a tutorial level - because they are games, 
stimulate the child to play with the machine; they are valuable as 
education only if the game is non-trivial and has some didactic con- 
tent. As soon as the concept Is learned and mastered, the only value 
that remains Is the child's delight at 'beating the machine' . . . which Is 
short-lived. We find that our children, given a choice between games 
and 'teaching' programs, generally go for the latter. 
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Special use programs can be fun to write, and worth the program- 
ming overhead even If used only once, If they demonstrate a concept 
cleanly. The availability of cheap non-volatile storage (casettes) 
makes it possible to write a library of such programs and use them as 
the subject comes up for a succession of kids, We have a lovely 
triangle-classifying program which uses a decision table to separate 
right isosceles from equilateral by asking three yes-no questions. We 
fire It up 2 or 3 times a year to reinforce the names of the triangles, 
and once a year to illustrate a talk on what a decision tree looks like 
and how it works. We have a ball-thrower which graphically 
demonstrates the effects of gravity and 'muzzle velocity' on a projec- 
tile. The computer functions in this genre of program as an animated, 
tireless blackboard. In writing such a program, you get to polish your 
ability to play the computer like a piano; the kids get the benefit of a 
dynamic and precise demonstration of a concept. 

Testing programs are good education only if they contain a 
teaching component; otherwise their function Is diagnostic and they 
don't belong, in our opinion, in a home or a school. A good example of 
a pure testing program is the oft-published State Game, wherein the 
student is supposed to supply, untutored, the capitois of Nevada and 
Delaware. If the program supplied corrections of bad guesses, and, 
say, a list of 5 good guesses to choose from, and required the child to 
type in the name, then we'd have some learning going on. An even bet- 
ter path might be to reverse the process and have the child find the 
state that matches the capitol city provided by the computer - it's 
much more likely that a knowledge of how to spelt the names of the 
states will come in handy some day, Further refinement might group 
the states georaphically or in some other instructive way, and set up a 
hint system which provides useful facts in the process. The teaching 
content remains tangential to the game - the testing may motivate, 
but it shouldn't be taken very seriously. Spelling games are hard to 
handle without resorting to testing - which is probably not the most 
productive way to approach any but the most Idiosyncratic words. 
Nevertheless, ingenuity (and lots of string manipulation) will un- 
doubtedly win out. Testing is a slnsiter function, and should be 
approached with caution. 

Programs that require the child-user to complete the program for 
their result offer a transitional step to full-bore programming, which is 
the logical conclusion of a Montessorl approach to computers. We've 
played with a program that coaches the child to encode the line that 
defines the function she has already worked out, then invites her to 
enter the range over which the computer should calculate the results. 
Our 8-year-olds type in a function like z = 3*r-2*c where r is the row 
and c the column, ask for r from 1 to 5 by ones, and the same fore, and 
the computer belches out a 5-by-5 matrix for the child to match 
against the one she has already calculated herself. The program 
coaches exactly what must be typed In - line number, expression, and 
re-entry code (GOTO400) - and runs flawlessly if and only if the child 
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follows directions precisely. From this experience it's just a matter of 
time before the kid shoves you out of the way and starts composing 
her own programs. 

THE COMPUTER GROWS UP 

When all Is said and done, the most Important lesson that your kid 
wiil learn from the computer is the computer itself. As time goes on, 
and those who are now children mature, matriculate, and stumble into 
the labor market, computers and terminal-oriented work stations and 
a whole generation of smart machinery will rule the working world (or I 
miss my guess). Many older workers are facing their fears and learn- 
ing to work In harmony with an electronic partner, and retraining for 
the skills that such work requires. Education has a tendency (you may 
have noticed . . .) to lag a dozen years or so behind the state of the art - 
and our children stand a good chance of falling right Into the biggest 
gap ever, unless we do something about It. Not to put too fine a point 
on It: if our kids start investigating computers now, from the outside 
as program users, they'll be ready and eager for some heavy-duty pro- 
gramming before they're out of school, and then go on to work on the 
work-designing end of things, rather than being told what to do by the 
machines. We come full circle to our original mainspring goal: 
independence and self-sufficiency are, from first to last, the keys to 
growth and joy. 

And who's going to complain if we can justify our own microcom- 
puter to play with Into the bargain? 
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IRK MEMORY KITS 

■ K»J I m by ITHACA AUDIO 



Everything you need to up-grade your 
TRS-80 to a 16K system 

• 8 tested and guaranteed 16K RAM's '--: 

• New programming jumpers 

• Easy-to-follow instructions 

• Only tool required is a household screwdriver 

Each kit is 100% guaranteed against failure. Add high quality, 
high density memory for less than you would expect to pay! 



$99.95 



Tj« 



TRS-0O Software Exchange 




Introducing the newest accessory 
for your TRS-80! 

THE LIGHT PEN 



An entire new world of software 

applications now ready and waiting 

for the touch of your hand. 

Available now for only $19.95 



TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 
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NEW! TRS-80 Computers 10% off! 

Effective July 1, Radio Shack dropped the price of TRS-80 
equipment. On the same date, we received authorization to 
set! the complete TRS-80 line, at 10% below the new low 
Radio Shack price. This all new equipment, with Radio Shack 
warranty and service, is now made more affordable than ever! 

if you're looking to save even more, consider HardSide's used 
equipment department for prime condition, previously owned 
TRS-80 equipment. 

Do you have- something to sell? Hardslde will buy any used 
Radio Shack TRS-80 equipment in good condition. Refer to 
our price list below. 

So ... if you're looking to buy or sell TRS-80 equipment, look 
to us first! 

As an Introduction to Hardside™ we are offering two special 

1) TRS-80 expansion Interface with our 16K RAM, single 
PERCOM disk drives with cable, and NEWDOS disk 
operating system. $830. Save $167. 

2) TRS-80 Level II, with our 48K RAM, dual PERCOM disk 
drives with cable, Centronics 779 tractor printer with cable, 
and NEWDOS + disk operating system. $2099. Save $1 144. 

These two offers are good for 60 days only, and expire November 30, 1979. 

We will soon be opening a retail location for our New England 
customers. Watch for details. 

6 South Street Milford, New Hampshire 03055 

(603)673-5144 
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NEW 


USED 


UNIT 


RETAIL 


HARDSIDE 








LIST PRICE 


DISCOUNT PRICE 


WE'LL PAY 


SELL 


Level 1 4K 


$499 


$449 


$275 


$375 


Level It 4K 


$619 


$557 


$370 


$475 


Level 1 16K 


$729 


$656 


$365 


$475 


Level II 16K 


$849 


$764 


$500 


$650 


Level II 16K, No Keypad - 




$669 


$450 


$600 


EXPANSION INTERFACE 










.... OK 


$299 


$269 


$175 


$240 


16K 


$448 


$369/$403 


$225 


$315 


. . . . 32K 


$597 


$469/$537 


$275 


$390 


DISK DRIVES 










Radio Shack #0 


$499 


$469 


$275 


$399 


Radio Shack #1 


$499 


$469 


$250 


$375 


PercomTFD-100 




$399 






Percom TFD-200 dual density 197K 


$675 






PRINTERS 










* Centronics 779 


$1559 


$1000 


$650 


$850 


Tractor Feed 










* Centronics P1 


$499 


$399 


$250 


$325 


Quick Printer II 


$219 


$197 


$125 


$175 


Line Printer II 


$999 


$899 






Line Printer III 


$1999 


$1799 






* Requires Cable 


$39 


$35 


$20 


$30 


R/S 26-1401 










TRS-80 HARDWARE ACCESSORIES 








Telephone Interface II 


$199 


$179 


$100 


$150 


16K Memory Kits 


$149 


$99 






RS232C Serial Interface 


$99 


$89 


$50 


$75 


TRS-232 Interface 




$49 






Data Dubber 




$49 






Line Cord Suppressor/Filter 


$32 







Prices do not include shipping 
COD orders require 
25% cash deposit 



Your Market For New And 
Used Microcomputer 
Equipment 




6 South Street Mllford, NH 03055 
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Ifector Graphic 

For Misappropriation of 
Electric Pencil, 
Seeks $1,094,000 



Michael Shrayer Software, Inc. filed suit in Los Angeles 
Superior Court on August 8, 1979, alleging breach of con- 
tract, fraud and deceit against Vector Graphic, inc. The 
suit seeks recovery in the sum of $1,094,000, and an in- 
junction prohibiting Vector Graphic from distributing 
either the Memorite II or Word Management System II. 
The complaint further charges that the Vector Graphic 
Memorite II and Word Management Systems II incor- 
porate, virtually byte for byte, the Electric Pencil II 
editor. 

The suit further seeks recovery for quantities of the 
original version of the Electric Pencil which Shrayer 
charges were distributed by Vector without payment of 
the agreed license fees. 

Michael Shrayer, when reached for comment, stated: 
"We intend to do whatever is necessary to protect our 
rights. Piracy of software, if left unchallenged, will 
destroy much of the incentive necessary for the creation 
of quality software, and will cause irrepairable damage 
to the industry." 
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TYPING 
TUTOR 



A 



by 80 US 

You probably have often thought 
that it would be a lot easier if you 
didn't have to "hunt and peck" 
at the typewriter or 
computer keyboard. If you 
could only double your typing 
speed, the job would be done 
, in half the time! And, with 
>/ increased speed and confidence 
comes increased accuracy. 

Level 1 1, 16K — $19.95 

Typing Tutor is a set of programs designed to teach you touch 
typing — from the basics of learning where the keys are, to 
practice drills at speeds that would make a Selectric shudder! Each 
lesson is displayed on the screen, including, at the early stages, a 
keyboard diagram. You are quizzed and graded, and you progress 
at your own pace. When you have mastered a lesson, the computer 
advances to the next, using CAI (computer aided instruction). 
Progress is fast, painless, and even fun as you keep pushing to 
break your own record. 

So, whether you'regoing back to school or just want to enter 
programs from SoftSide that much faster, Typing Tutor can help. 

Order a copy today and be a better typist by next week. 



TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 



Basic Disk 
Cross Reference 

Utility 



by L. C. Chesbro 



Have you ever tried to modify someone else's program (or maybe 
one of yours that you haven't touched for six months) and wondered 
what the effect of changing a subroutine, deleting or inserting a line 
will be? Without spending a lot of time to understand fully the flow of 
the program, such changes can be a risky proposition. Here is a utility 
to take some of the guesswork out of it. 

Those who work on larger computers take cross-reference listings 
for granted. If they want to know which lines reference a particular 
subroutine, they just look it up. However, the TRS-80 user hasn't had 
that luxury, until NOW! 

The CROSS REFERENCE UTILITY will read the program you specify 
from the disk file and accumulate an ordered list of all program lines 
and the line(s) from which they were referenced. Upon completion, the 
cross-reference list will be printed on the line printer (see example out- 
put). There is no limit to the number of references for a particular line, 
but the total number of lines referenced by other lines is limited to 
400. The file you cross-reference must be a BASIC compressed pro- 
gram (not in ASCII format). 

Execution is simple: you enter the name of the disk file where the 
source program is stored. The hardware and software required is a 
32K DOS system running TRSDOS2.2. A line printer is recommended, 
but if you do not have one, either change the LPRlNTs In lines 110-200 
to PRINTS, or insert the following statement: 

5 POKE 16422,PEEK(16414); POKE 16423,PEEK<16415) 

The latter causes all output which would be printed to appear on the 
CRT screen. 



16 'TRS-88 DISK BfiSIC LINE HUHBER CROSS REFERENCE UTILITY 

26 -'L C. CHESBRO 87/88/79 .-'-.;.■ ■.' . 

26 CLS: DEFINT fi-2: DIM LHC408,5> ■-■ . 

48 T=8: 11=5. 1=8: J=8: K=8: 11="": ltt=", MHT: tl=8 

58 LIHEINPUT "FILESPEC: *jFS$: OPEN "RM.FS* .■ 

66 FIELD 1,254 ftS C*, 2 ftS D* 

70 FiaD 1,255 AS M> IfiSBI .. ■'■■-... 

36 GET 1,1: LL=CVKMW(fl*#4,2»: N=l 

90 IF LEFTI(fl$,lXX:HR*CiHFF> THEN PRINT "THE FILE IS NOT fl-COHR'; 

RESSED BfiSIC PROGRfln 8 : GOTO 258 

186 GOSU6 266 

•118 IF T=S THEN 148 ELSE IF K141 THEN 180 

126 IF 7=159 OR T=149 OR T=145 OR T=141 OR T=282 THEN GOSUB 416 

: GOTO 118 

120 SOTO 180 

148 LPRINT CHR*<12>;« CROSS-REFERENCE LISTING FOR *if$$i* B ;T 

WEI 

156 LPRINT CHR$<138)>" LINE # REFERENCED IN LINE(S):" 

160 LPRINT CHRK138) 

176 FOR 1=8 TO TL 

188 IF IOe THEN IF LM<I-L0ttJKI.e> THEN LPRINT Tfi8<3>, USING " 

#l#t#"»LN(I,l)i: GOTO 288 

198 LPRIHT USING " #**#*MN<l,6>;LN<I,l>; 

286 FOR J=2 TO 5 

218 IF UKI,J)08 THEN LPRINT USING HfcLfKLJ); : NEXT J 

228 IF LN<I+1,0)OU«I,0) THEN 246 

220 1=1+1: FOR J=l TO 5: IF LfJ(l,J)<>8 THEN LPRINT USING HfcLiKI 

,J>;: NEXT J 

240 LPRINT: NEXT I 

250 CLOSE: END 

260 11=11+1: IF Il>256 THEN G0SU8 466 

276 IF 11=256 THEN Tf=B$: GOTO 298 

280 T*=MID$ <», IL 1) 

296 T=ASCCT*>: IF T<>8 THEN RETURN 

280 11=11+4: IF Il>257 THEN 250 

210 IF CVKMD$<ft*,U-3>2»=6 THEN RETURN 

326 IF 1K=255 THEN 398 

326 IF 11=256 THEN 0L=LL. LL=CVKD*): GOTO 266 

346 H**B#: GOSUB 468: OL=LL: LL<VI<H$*tIFT*<R*,l»: GOTO 268 

358 ON 11-257 GOTO 368> 278, 380 
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:<S8 if cvi<w>*e then return else qosub m- goto 299 ■ 

2?6 K*=Bf: GOSUB 489: IF CVI(Ht+LEFT*{fl*,l)>=8 THEN RETURN ELSE 

390 

'M QOSLB 408: IF CVKLEFT*<flfc2»=8 THEN RETURN 

s% GL=LL: LL=CVKMI>*<fi*,Ii-l,2)>: GOTO 266 

408 11=11-256: N=N+1: GET hU: RETURN 

418 LN$="": QL=tL 

428 GOSUB 263: IF T*=* " THEN 426 .■■■■'■ '. 

430 IF T*=>"6" HND T$<="9" THEN LH*=LN*+T* : ■ GOTO 429 

448 LM=yflL<LN*): IF LN=6 THEN RETURN 

456 I=TL/2: IF LN<L6»LN THEN 1=6 

468 FOR 1=1 TO 466: IF LN«>8)=IN THEN 528 

4?8 IF LN(L6)=0 THEN Tt=I : GOTO 526 

488 IF UKUBXLN THEN NE>:T I: PRINT "MORE THftN 466 LINES REFERE 

NCED": GOTO 146 

496 FOR >TL TO I STEP -1 ■ 

5® FOR K=8 TO 5: UKJH.K)=LN<J#IC>: NEXT K 

519 NEXT J. FOR J=l TO 5: LNU,J>=8: NEXT J: Tl=7t+1 ■ 

520 LN(I»0>=LN 

538 FOR J=l TO 5: IF LN<LJX>8 THEN NEXT J: I-I+i: GOTO 466 
546 LNCI,J)=OL: IF T$=V THEN 418 ELSE RETURN 



PROGRAMMING HINT 

Ever wish you coufd get a directory listing on your printer? 

Here is a way! 

In BASIC, enter: 

POKE 16414,PEEK(16422): POKE 1641 5,PEEK(1 6423) 

Then enter: 

CMD"S" and issue your DIR command normally. Everything that 
would normally appear on the CRT, now goes to the printer (in- 
cluding what you type). To restore normal operation, press the 
RESET button and re-boot DOS. 
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fey 

Scott 
Adams 

Two adventures 
on disk I $24.95 
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Tile COUIlt You're in Dracula's castle ■!-' 
and your mission is to destroy him and thereby ||§JP^ 
rid the world of his evil! B^ 

VOOOOO V«clSUe Remove a voodoo curse from Count 
Christo and set him free forever! 

• Now in machine language for instant responses and 
more excitement! Plus new versions of these old 
favorites: • Land Adventure • Pirate's Cove • Mission Impossible 



I 
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Renumbering 
Progra m For 

trsdqs 



by Rocky Smolln 



Yes, yes. I know what you're saying. A little late for a TRS-80 
renumbering program, isn't it? Well, this one should be Instructive 
from a programming standpoint, and if only for that reason, I hope you 
en)oy reading about it. 

I tried to make it as simple and straightforward as possible keeping 
the bells and whistles to a minimum. The program executes in two 
passes, in the first pass each of the statements are read and an old 
and a new statement number are stored In equivalent positions In the 
array MA'. Then the program Is read for a second time, this time replac- 
ing the old statement number with new ones and scanning the line for 
other statement numbers, replacing them with the new statement 
numbers. 

Page number references below refer to TRSDOS and Disk Basic 
Reference Manual put out by Radio Shack, I highly recommend this 
excellently written and informative manual (they evenput in an index 
this time). 

To get the renumbering program to work properly, you must first 
store the program to be renumbered in ASCII format, like this: SAVE 
"PROGRAM:1",A . It's the ,A that does it. Normally to save space on 
the disk, BASIC will take all the keywords like GOSUB and PRINT and 
convert them to a one-byte code, It also takes the statement numbers, 
converts them from string to integer and inserts them In the output 
file. 

If you use the DISKDUMP program to look at a program you've 
saved on disk, it will be full of strange looking codes. When you load a 
program, the BASIC interpreter does the opposite operation - it 
translates the codes back into keywords again. The whole process Is 
transparent to you, the user. 
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However, since this renumbering program isn't smart enough to 
deal with the condensed format, you must store programs to be 
renumbered in the ASCII, that is, uncondensed format. After you do 
this, look at the file on disk. You'll see all the keywords and statement 
numbers in the disk file just as they appear in your program. However, 
if you do a 'DIR (A)' which will give you a directory listing with program 
sizes (see page 4-16 for a complete explanation of the 'DIR' 
command), you'll see that the ASCII format programs take up 
significantly more space on your disk than the compressed format. 
See page 7-31 for more info on the ASCII format. 

The program up to line 350 is pretty self explanatory: some 
housekeeping, some necessary inquiries, and file openings. The 'LINE 
INPUT' command in line 360 is required instead of a simple 'INPUT' 
because 'INPUT alone will stop reading when it hits a comma, and 
leaves the rest of the statement behind (no good obviously, when 
reading a BASIC language program), 'LINE INPUT' on the other hand, 
reads until it sees a carriage return code, so the whole statement ends 
up in A$. Try it both ways and you'll see what I mean. More on 'LINE 
INPUT' can be found on page 7-42. 

In the first pass all I'm doing is storing the new line number in row 
one of array IA, and the old line number in row two. Notice how easy it 
is to extract the line number from the statement. 'VAL (A$)' does it 
without having to scan each byte for a valid numeric character, and 
build the number byte by byte. Try some mixed alphabetic and 
numeric character strings as arguments for the VAL function and see 
how it pulls a number out of a string . . . very interesting, and handy, 
too, for an application like this. The Level II Basic Manual has the 
write up on page 5-8. 

In the second pass, the program looks for the keywords. The 
subroutine at 920 has already read the keywords into the string array 
B$. This arrangement makes it easy to add keywords to the scanning 
process. Simply increase the size of B$, add the words to the DATA 
statement in 930, and raise the upper limits of the 'FOR' loops in 
statements 920 and 520. 

The 'INSTR' function in line 530 returns a zero if the string being 
scanned for is not present. If it is present, 'INSTR' returns the position 
of the byte where the string starts. See page 7-15 for the complete 
story on 'INSTR'. 

Statements 590-630 format the new line with the new statement 
number and write it to disk. Since the STR$ function puts a leading 
blank on the number which is converted to string format, the second 
statement in line 600 strips it off. Note the use of functions embedded 
within functions. The two statements could have been combined 
thusly: 

N$ = RIGHT$(STR$(IA,(1,N)),LEN{STR$(IA(1,N)))) 
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but it would take much longer to execute (not to mention write and 
debug), because of the redundant use of the STR$ function. It's also 
more difficult to read. 

The subroutine which starts at line 710 removes the old statement 
number reference and replaces it with the new one. 'K1' Is the integer 
form of the old statement number, 'K2' is the length. The loop 760-780 
searches the old array for the old statement number and pulls out the 
new statement number into KK$. Yes, I could have used a binary 
search routine, which would have been faster and more clever. If you 
can devise one which Is fast, compact, and reliable, send it in. Maybe 
Mr. Robitalile will print It. 

At line 850 is the subroutine which handles lists of statement 
numbers which occur in computed GOTO's and GOSUB's. It keys on 
commas and if it finds one it calls the change subroutine at line 710 
with 'I' pointing to the next number to be changed. 

And that's it, folks. The moral of the program is "keep it simple'. You 
can easily outclever yourself in a program and end up with lots of 
debug for a little processing. Remember, the shortest distance 
between two points is still a straight line. 

16 '" RENUMBERING PROGRAM FOR TRS-88 DISK SYSTEMS 

20 ' WRITTEN BY ROCKY SHUN ■ •■ 

38 ' 7325 DRAPER 

48 "' Lfl JOLLA, Cfl. 9263? 

56 ' ....'.. 

66 ' DO SOME HOUSEKEEPING FUNCTIONS - ; 

70 ' 

80 ' FOR PROGRAMS WITH MORE THAN 206 STATEMENTS INCREASE THE • 

96 '■' SECOND ARGUMENT IN IA FROM 206 TO THE LARGER NUMBER 

118 CLEAR 2G00:DEFINT 1-N:D1R M2, £00), B$(5> -.K=i :G0SUB928 

120 ' 

128 ' ftSK THE VITAL QUESTIONS 

148 ' 

158 INPUT "WHAT IS THE 0U> PROGRAM NAH£";F1* 

160 INPUT "WHAT DRIVE IS IT ON K ;f>W:Fl*=Fl*+":"+Dl* 
178 INPUT "WHAT IS NEW PROGRAM NflME*;F2f 

188 INPUT "WHAT DRIVE IS IT 0N ,, ;D2$:F2$=F2$+' , : H +D2$ 

190 INPUT "WHAT IS STARTING STATEMENT NUMBER"; IS 
288 INPUT "WHAT IS INCREMENTMI 
210 ' 
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226 ' SET ERROR TRflP . .■....','...■."■ 

238 ' <. ■'•■:■■'*-■■:■■■ '■■' -'■' • 

246 ' ON ERROR GOTO 946 

258 ' 

268 ' OPEN FILES 

276 •' .'..-. 

286 PRINT "OPENING ";Fi* . ■" ' 

298 OPEN "IM,Fi*:N»8 '-■.■ -..j ■■■■'-. 

268 PRINT "OPENING ";F2$ 

318 OPEN "0"*2.F2» 

328 PRIHT "FIRST PfiSSMfllMT 

330 ' 

346 ' READ SOURCE FILE; STORE STATEMENT ' NUMBERS IN ARRflV 

358 ' 

368 LINE INPUT #Lftf 

378 PRINTfi968»LEFT*<fl*,68)i 

386 N=N+i 

298 ma»H>=lS:IS=IS+II:Ift<2,N>=VfiL(fl*> 

466 IF E0F<1> GOTO 428 

416 GOTO 368 

428 PRIHT:PRM "FIRST PRSS COMPLETE": .' 

438 NS=N 

448' 

458 ' SECOND PflSS 

466 ' 

478 aOSE 1:PR1NT "SECOND PftSS":Of£N »I.M,F1*:FR1NT:IM 

486 LINE INPUT#l,fi$:N=N+l:K=LEN<A*> 

498 ' ..:.. Ll. 

586 '■ SCAN FOR KEVWGRDS 

518 ' " . , ' 

528 FOR: J=i TO 5:X=1 

536 I»IKSTR<X»ft*,B*<J)>:IF 1=6 GOTO 558 

548 I*I+LEN<B«J»:GOSUB 7i8:GQSUB 858 :X=I: GOTO 538 

556 NEXT J 

568 ' 

578 ' FORMAT OUTPUT LINE AND WRITE TO DISK 

588 ' 

598 I=LEM<STR*<VAL<»»> 

688 N$-STR$< IftCL N» :N$=R1GHT$<N$, LEN(Nf >-!> 

616 B$=N*+" r '+RIGHT*<flt,<K-I)> 
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526 PRINT#2,6S: PRINT 6$ 

638 IF E0F<1> GOTO 678 ELSE GOTO 488 

640 ' 

658 ' END OF PROGRAM 

660 ' 

676 PRINT: PRINT "SECOND PftSS COMPLETE" :CLOSEi» 2: END 

688 ' 

698 ' CHFlNGE FROM OLD STfiTEHENT HL«1B£R TO NEW ■ <:■'■'.' 

786 ' ...,'■/''...■ 

718 IF I=K THEN RETURN 

728 IF MD*<fl*. I,l>=" ■ THEN I=l+i:GQT0 718 

728 IF MlM<flf,Ll)<"0* OR «ID*(fl$,I,l)>"9" THEN RETURN 

?48Kl*VflL(MID*<fl**L5>> 

758 K2=L£N<STRf(Kl»-l 

768 FOR K2=l TO NS 

776 IF Ifl<2,K3)=Kl THENKK*==STR*<IfKl,IO>>:GOTG 798 

788 NEXT:PRINT "STftTEMENT #";K1;" NOT FOUND" :STOP 

798 fif=LEFT*<ftl, I-t>+RKHT*<KKfc <L£N(KK*>-i)>+RIGHT$(ft*,'<K-i.TK2+ 

i» 

889 I=I+LEN(KK*M 

818 K=LEN(fi*>: RETURN 

828 ' 

828 ' HfiNDLE STRINGS OF STATEMENT NUMBERS 

848 ' 

858 IF 1-K RETURN 

868 IF niimm,hV=" " THEN I=I+i:GOTO S50 . 

878 IF l1ID$<fi*»I>i)OV THEN RETURN ■■ 

888 I=I+1:G05UB 718:6010 858 

898 ' 

988 ' L0M> KEVWORDS INTO STRING SRRRV 

918 ' 

328 FOR 1=1 TO 5:R£flD 8$<I):NEXT I:RETURN 

320 DATA "GOTO", "GOSUB".. "THEN", "ELSE", "RESUME" 

948 PRINT "PROGRAM ERROR*"; ERR/2+1; "DISK ERRORS; ERR/2; "LINE NUM 

BER=";ERL.STOP 
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Recommended for 
Small Businesses 



Small 

Business 

Bookkeeping 

Based on the well- 
known Dome Book- 
keeping System. Posts 
expenses to as many as 42 
accounts (which you may' 
customize). Produces video 
and line printer reports for" 
year to last week, this week, year to date; 
supports cash system of accounting; 
stores data on disk for fast retrieval. 

TRS-80 SOFTWARE EXCHANGE 

P.O. BOX 68, MILFORD, NH 03055 




by Miller Microcomputer Services 
and Roger W. Robitaille, Sr. 



Available for 32K 
Disk Systems -$24.95 



PERIODICAL 
CROSS-REFERENCE 

by Dave Stambaugh 

YOU DON'T HAVE TO BE A LIBRARIAN 

Every professional or serious hobbyist who 
relies on current literature to update his/ 
her knowledge can benefit from this pro- 
gram. Build a file using any subjects or 
publications you like (18 per file). Allows 
you to add, delete, edit; search by sub- 
ject or publication; list on CRT or line 
printer all or selected entries. SAVE, LOAD with 
both tape and disk versions. 

Level II, 16K $14.95 - Disk $19.95. 

TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 
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INTRODUCTION TO 
TRS-80 GRAPHICS 

by Don In man 

About the Book . . . 

For some time now, graphic displays on 
microcomputers have been out of the reach of 
hobbyists because of their complexity and high 
cost. In this book, author Don Inman will show 
you how, with a minimal knowledge of the 
BASIC computer language and your TRS-80 
computer, you can create graphic displays that 
only a few years ago were the exclusive turf of 
the big computer owners. The book begins with 
the basics and works from line drawings 
through geometries and right on up to moving 
figure animation and more advanced opera- 
tions. A great handbook on computer graphics 
for microcomputer owners at ali levels of ex- 
perience. $7.95 + $ 1#0 o shipping and handling 



TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 



40 



Squish-2 



by Bill Everett 



The following program is an improved version of SQUISH, which appeared in 
the May issue of PROG/80. The primary new feature that I added is the ability 
to remove remarks from a basic program. 

The original features of SQUISH are listed below. 

1) Remove all unnecessary blank spaces. 

2) Write the squished program on the original file. 

3) Inhibit the BREAK key. 

4) Load the squished program at the end of the squish 
operation. 

The modified SQUISH-2 has the following features: 

1) It is written for a DISK based TRS-80. 

2) Removes all unnecessary blank spaces from a basic 
program stored in the ASCII format on disk. 

3) The user may select the file name that the squished 
program is output to. The original name may be used 
and the output will destroy the original or a different 
file name can be used which allows the retention of the 
original file. 

4) The BREAK key is no longer inhibited. This function 
was only operational on some DOS systems and would 
destroy other DOS systems. 

5) The user may optionally delete all remarks. If a 
remark is the only thing left on a line, the line 
number and a " ' " are left in case the program 
jumps to that line. 

6) The program checks to see if the input file has been 
saved in the ASCII format, and If not, gives an error 
message. 

7) The programmer may load the squished program at the 
end of SQUISH-2 if he chooses or he may go on to 
squish another program. 

8) A full set of instructions has been included. 

9) During operation the current line number being 
squished has been added to the display. 

10) The display has been cleaned up. 
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18 'SQUISH2 

28 'ORIGINAL PROGRftM FORM MAY 79 PROG 88 

38 'DATE LAST MODIFIED 7-2-79 

48 'MODIFIED FROM THE ORIGINS. 6V: SILL EVERETT 

14645 IC 34TH C-24 
BELLEVUE, Wi. 98887 
(286) 882 8475 

58 CL5:PRINT823>"SQUISH-2 

68 PRINT8128, "THIS PROGRAM REMOVES ALL EXTRA SPfiCES FROM ft 8AS1 

C 

PROGRAM. IT IS ALSO CAPABLE OF REMOVING ALL REMARKS FROM A 

PROGRAM IF THAI OPTION IS SELECTED. IF A LINE ONLV CONTAINS ft 

76 PRINT "REMARK IT HILL NOT DELETE THE LINE NUMBER IK CASE THER 

E IS 

ft BRANCH TO THE REMARK LINE FROM SOME OTHER LINE IN THE PROGRAM 

88 PRINT: PRINT "IF THE BREAK KEY IS DEPRESSED DURING EXICUTIGN 

OF THIS 

PROGRAM THE OUTPUT FILE HILL NOT BE COMPLETE NOR MILL THE OUTPUT 

FILE BE CLOSED. 

THIS PROGRAM TftKES ft LONG LONG TIME TO EXECUTE 

98 INPUT - 

DEPRESS ENTER TO START"; ft* ■ 

188 DEF1NT R-2 

118 CLEAR MEM/2 

128 as 

128 PRINT6128, "THE INPUT PROGRAM MUST HAVE BEEN SAVED UNDER THE 

ASCI OPTION 

148 PRINT8256, "PROGRAM NAME TO BE SQUISHED"; : INPUTFI* 

158 PRINTem "THE SQUISHED PROGRAMS NAME HAY 6£ THE SfthE AS THE 

INPUT 
PROGRAMS NftME BUT IF IT IS THE INPUT PROGRAM IS LOST. MAKE SURE 
THERE IS ENOUGH FREE DISC SPACE FOR THE SQUISHED PROGRAM IF ft 
DIFFERENT NAME IS USED. 

168 PRINT: INPUT'UNOER WHAT NAME DO YOU WANT TO SAVE THE PROGRAM 
";FM 

178 INPUT " 

DO YOU WANT TO DELETE ALL REMARKS"* ft*: IF LEFT*(ft*i 1)="Y" THEN K 
K=l 

180 CLS: PRINT CHRK23): PRIKW142, "SQUISH 
190 OPEN'IMiFI* 
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288 QP0r6"i2.FO* .-."-. -.-■.■ 

216 IFECf (DTHEN468 — ■ 

220 LWEtNPUTtLfi* 
238 XX*VflL<ftf > 

246 IF XX<1 THEN CLOSE: OS: PRIHTWIZ "YOU ARE READING A BAD PR 

OGRfW': END 

258 PRWT844& 1INE NU18ER BEING REftD";TBS<22);XXi 

260 RC=*C+l:fift=fift+LEN<ft*> 

270 PRINTS, "LIKES READ"; TR8<23>; Rfc 

268 FOROiTOLflKftf ) 

290 PRINTO512, "SCflNNIMG POS. "; TAB<23>; to " "i 

380 PRINT85P& "COHPRESS SWITCH"; Tfi8(24>; :IF SW=0PRINT"QN "; ELSE 
PRIHT-OFF"; 
316 IFMID$<Ftf, C, l)*O«IG4)flN&SH=0TH£NSH^iaSEIFHIW(ftt» to 1>=CHR 
$<24)THENSR=6 

328 PRINT3648, "CHARACTERS aifflNflTED'j Tft3C23>; TSEi 
230 IF KK=8 GOTO 370 

348 IF SW=8 AND HID*(fif»C !>»"'* THEN GOTO 368 
358 IF SH=0 AND HIDI(RI,C ) 2)="REtt" THEN 360 ELSE 370 
368 TSE4£N(fl»)-C*TSE: IF C<8 THEN B$=B$+"»; TSE=TSE-i: GOTO 38 
8: ELSE GOTO 388 

379 IFSH=8AW)HII>$<R$Xi>»" "ORHIOKftf. C 1>=CHR*<18>THENTSE=TSE+ 
l:f£XTELS£8*=6*+MID*<A*,C,l):N£XT 

388 IF RlQHT$(B$»i)**:"THEN Bl=LEFT$(B$-LEN(B$M):TSE=TS£+l 
338 PRINTt&e* 
488 HRsHR+1 

418 PRINT0704, 'LINES WRITTEN"; TAB<22>; HRi 
428PRIKTe?68/ l BVTBSCftNNED ( 'iTAB<23)iftfli . ■ 
430 e^"" 
448 SN=8 
456 GOT0210 
468 CLOSE 

476 PRINT§8%> "DEPRESS THE V KEY TO LOAD THE SQUISHED PRGGRftfl" 
i :fl*=INKEV*: IF ft**"" THEN 478 ELSE If A*="L" THEN CIS: LORD F0$ 
: ELSE CLS: END 




Get 9 

LOAD 

of this I 



If you have less 

time at the keyboard than 

you would like to, and have been missing 

out on some of SoftSide's feature programs, 

We've got a solution! 



5am 



TH 



e. 



Your BASIC software magazine for TRS-80 

On Cassettes 

That's right! Now, all out monthly programs will 
be available on audio cassettes, for only about a 
dollar apiece - SATISFACTION GUARANTEED. 



The price for 6 months of cassettes plus 6 
months of SoftSide magazine is only $38.00. 
!f you're already a subscriber to the 
magazine, you can enroll for the cassettes 
only, at a cost of $30.00 for 6 months. 
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So, if you want to combine the best programming 
available for the TRS-80 with the convenience of 
pre-recorded program cassettes, send your order 
to SoftSide today, and leave the coding to us! 




r 



-5o"ff5i3 



e" your BASIC software magazine" 
■ PO Box a Milford, NH 03055 



"> 



ALL RIGHT! Enroll me for 6 months of 
SoftSide on cassette. My full payment is 
enclosed as indicated below; 

J New Subscriber - $38.00 DSubscriber - $30.00 
D Check □ Money Order 

HCharge to Master Charge/VISA j£Z 



Exp. date 

Signature 

NAME 

ADDRESS 

CITY, STATE 

^ 



Interbank#. 



ZIP. 



J 
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Old 




by Lance Mickius 



I guess I didn't know what I was getting Into when I published that 
upper-lower case mod back in the tirst issue of PROG 80. The letters 
and phone calls It generated were incredible. 

One of the things we found out was that all keyboards are not alike. 
To do the modifications on some keyboards, you will have to add a 
pull up resistor of between 100 to 330 ohms from pin 13 to pin 16 of 
Z27. Try the modification without the resistor. If youget thunderbolts 
and Greek letters, put the resistor in. 

This information is supplied with ST-80D, KVP, etc. I am now ready 
to leave well enough alone, But . . . 

I got a call from John Gersbach here in Burlington. He wanted to do 
my modification but he did not like the way I OR'd the outputs of the 
chips. He thought he might be able to find a better way of doing this 
by adding an OR gate. I had to agree with him that his idea would be 
better. A few days later, he sent me his improved modification of my 
modification. 

I haven't tried it out on my keyboard, but Mr. Gersbach does have it 
running on his keyboard. As near as we can figure, it should work on 
all keyboards the same way. (Gulp!) Assuming that's true, here is yet 
another upper-lower case, make-at-your-own-risk-then-tell-us-what- 
happened modification, that will void your Radio Shack warranty. (I 
think the lawyers are happy now.) 



CUT 3 TRACES: . .«:. 

Z73 pin 9 to Z73 pin 12 on the trace side. 
Z30 pin 13 to Z60 pin 4 on the component side. 
Z60 pin 4 to Z27 pin 13 on the trace size near Z27. 
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ADD A PIGGY BACK 2102 over Z45 bending oiit pins 11 and 12. Note 

that only one 2102 Is used In this modification. 

ADD 5 WIRES: 

Z45Apin11 toZ60pin5 - •* . ' 

Z45A pin 12 to Z60 pin 4 

Z45A pin 12toZ73 pin 13 "". <__ ^_ 

Z73 pin 12 to Z30 pin 13 — 

Z73 pin 11 toZ27pin 13 f 




1 2 



Z30 



Sr 
t 




r - / 



- CUT 
TRACE 
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A UTILITY PROGRAM 

THAT GREATLY EXTENDS 

THE KEYBOARD, VIDEO, 

AND PRINTER 
SUBROUTINES IN YOUR 
LEVEL II ROM! 




by Lance Mlcklus 



KVP runs under DOS or Level II BASIC. It is relocatable under your 
control, and so may be used simultaneously with other machine 
language programs. At least 16K of memory is required. 

Here are some of the 
things you'll be able to do: 



USE AN EXTERNAL KEYBOARD 

Or, use any other serial Input device In 
place ot the TRS-80 keyboard. 



ELIMINATE A COMMON SOURCE OF 
PROGRAM ERRORS by running your 
keyboard In upper case only, or run In 
upper/lower case mode |ust Ilka a 
typewriter. 



PRACTICALLY ELIMINATE KEYBOARD 
BOUNCE. The amouni ot debouncing In 
user-adjustable. 



DISPLAY UPPER AND LOWER CASE 
LETTERS on your video monitor screen. 



Self-relocating 



SIMULATE A RADIO SHACK SCREEN 
PRINTER using an ordinary printer. 



USE MOST ANY ASCII SERIAL 
PRINTER. Such as Teletype 33 or 
Splnterm. 



TELL THE TRS-80 YOU HAVE NO 
PRINTER AT ALL. 



EXCHANGE PROGRAMS WRITTEN IN 
BASIC WITH OTHER COMPUTERS. 

From the Sorcerer to the IBM 370 (and 
TRS-80'a. tooll 



THE LIST GOES ON AND ONI 



for 16K, 32 



32K or 48K systems 



$24.95 on tape $29.95 on i 



TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 




TIRED OF DISK ERRORS? 

STOP BLAMING YOUR DRIVES - 
FIX YOUR DOS! 

NEWDOS, by Apparat, is the third generation disk operating 
system for your TRS-80. NEWDOS corrects over 70 errors and 
omissions in TRSDOS 2.1 and disk BASIC, yet the two are 
completely compatible! Programs and files saved under one can 
be used with the other interchangeably. Going from TRSDOS 
2.1 to NEWDOS is like going from Level I to Level II: more 
power, more convenience, greater speed. 



NEWDOS NEWDOS+ 



Use all DOS commands 
(incl. directory) in BASIC 
Automatically load and run 
a BASIC program 
on power-up 
Produce variable cross- 
reference tables 
Open 'E' to add to 
sequential files 

Append files 

Use your line printer as 
a screen printer 

Renumber BASIC programs 

End keyboard bounce 



Editor/ Assembler for disk • 
Disassembler • 
(Z80 machine code) 
LM Offset-allows transfer of any • 
system tape to a disk file 
(automatically relocated) 
BASICI-Level one BASIC- 
saved on disk 
LV1DSKSL - not a typo, this . 
saves and loads BASIC1 
programs to disk 
DIRCHECK-testsand lists • 
disk directory 
SUPERZAP-display/print/modify • 
any location in memory or on disk 



And, best of all, say goodbye to system crashes, lost data and 
wasted time caused by your old, bug-ridden system software. 
Apparat's NEWDOS is fully documented and available for 
only $49.95. NEWDOS + , Just $99.95 

NOTE: Use of this software may require documentation 
available only with the purchase of Radio Shack TRSDOS 2.1 
and/or the Radio Shack Editor/ Assembler. 

TRS-80 SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 



String Crasher 

For 32K TRS-80 



by Clayton E. Schneider 



Perhaps you are already aware of the tendency of Disk Basic to over- 
write the top 6 bytes of 48K RAM, destroying whatever string data may 
be located there. Perhaps you are also aware that "improperly" ex- 
iting a FOR-NEXT loop can cause an NF error later in your program. 
Well, get ready for the really bad news . . . 

I came across this one while attempting to convert a Level 1 program 
to Level II (the program was from Fort Worth). The bug boils down to 
the following lines: 

1 INPUT H$ 

'; . ■■■■■ S. t2=RND-H} 

3 FOR 1=110=) 

M IF A-CI}=0 THEN A-CI>=(3 

■ - : ■ S IF I=T THEN B 

* *•-•■■ ■ b IF A-CI>=(2 THEN 2 

7 NEXT I 

fl PRINT N$ 

Try running this program with a 32K system (either Level II or Disk) 
without answering MEMORY SIZE or changing the normal CLEAR 50. 
(If you have a 48K system, use a memory size of 49153.) You will find 
that in the course of program execution, very curious things happen to 
N$ - and no error message Is displayed! 

In addition, you will find that changing memory size or the size of the 
clear will make the problem "go away" -- it seems. 

Yes, changing fines 3 and 7 to "E I = 1" and "7 1 = 1 + 1: GOTO 4" 
makes It run perfectly, regardless of size, etc. And yes, there are more 
straightforward ways to do lines 2-7, and if R.S. didn't do it that way, I 
doubt I would ever have found the problem. 

So it goes ... 
50 
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Princess Leya is being held 
prisoner on General Doom's battle cruiser. 

There are guards everywhere, plus an attack robot that won't 
let you past. The computer is your puppet. Using ordinary English 
words, you must explore the giant space ship, locate the Princess 
and rescue her. To add to your troubles, your 
space ship is out of order and must be repaired 
before you can escape. Dog Star Adventure 
has a vocabulary of over 50 words 
and supports 35 different environments. 

Requires only 16K and Level II BASIC. 




Price, 
$9.95 



DOG 
STAR 

DVENTURE 

by Lance Micklus 




Date and lime 
Routine For 
TRS-DOS2.2 



by George W. Blank 



If you are using a program that directly uses the T(ME$ func- 
tion in TRS-DOS 2.2, this will greatly simplify updating your 
clock. This subroutine is not copywritten, so feel free to use it in 
any program. 

IS REM * SET DATE AND TIME * 

20 REM * GEORGE BLRNK * JULV 4, 1979 * 

39 REM * FOR TRS-DOS 2. 2 * 

40 CLS : PRINT 

50 PRINT "DATE IS SET TO "LEFT* (TIME*, 8> 

60 INPUT "IS THIS CORRECTOR* 

70 IF LEF7*<ft*,l>="Y" THEN 110 

80 INPUT "MONTH < NUMBER )" , R : POKE 16454, ft 

90 INPUT "ORV <NUMB£R)",R : POKE 16452, R 

100 INPUT "VEftR'-ifi* : POKE 16452, VflL<RIGHT$(fi$, 2)> 

110 PRINT : PRIHT-TIPE IS SET TO ";RIGHT$<TIME*, 8) 

120 INPUT "IS THIS CORRECT" j ft$ 

129 IF LEFTS< R*,1"J="V" THEN 180 

140 INPUT "HOUR"; ft : POKE 16451, ft 

150 INPUT "MINUTE"; ft : POKE 16450, ft 

ISO INPUT "SECOND"; fl : POKE 16449, ft 

170 GOTO 40 

188 END 



52 







#i 



H^.t^ 



OP 00 s - jT 



s* 















** 



«\* 



# 



v^ 



N* 



>e N 



,e^ 



<xV v 



.V^ 



k <V* 



V°* 



^ 



**> 



i«c*&y 




& 



1&& 






p^^ v 



^ •<« 



^^ 




53 




g o: 



6 8 2 



lff| 

ro & * £ 



to C 



. "J 



38"! 

nib 



■ O "> 



O v 



3 * 



6oJo 

If sit 

«I -° ■- c 3 

,J= >. - * ** 

SssSg 



a 0-0.0 



a. 



• sinta (eoiijdeiBtnW) i«t ajqisuodsai ion- 


















8 




















UJ 

o 
a: 


UJ 

o 
a: 
< 

I 
o 

< 
z 
o 

5 

Q 


a: a> 
m 2' 
a <$ . 

g5j 

Ell 

ir 

o 
III 

CO 

|i 

< 

e 

<» 
c 
o 
















n < 

r 
o 
o 
z 
















-J 
D 
Z 
< 

X 

o 

Q 
< 



8SS- 

i*fl 






54 



JaBS 



PO Box 68 

Milford, NH 03055 
"your BASIC software' magazine" 

Rush me the next 12 issues of SoftSide. 

□ USA bulk. $18 1yr. C!$32-2yrs. □CANADA/MEXICO $25 1 yr. 

□ USA first class $25 1 yr. ^OVERSEAS airmail $30 1 yr. 

□ APO/OVERSEAS surface $25 1 yr. Telephone your charge card order! Call 
^^^_ our Subscription olf ice Monday through 

Crprlir Card tSc Friday 9:30 to 5:30 (Eastern time) at 

«■■ 603-673-5144 



Exp. Date_ 
Signature- 

Name 

Address — 
City 



.Interbank # 



M/C only). 



-State 



Zip- 



Please remit in US funds ONLY 



Ready to get serious? SUBSCRIBE TO PROG/80 the magazine 
dedicated to serious programmers. . .beginners to professionals 

SUBSCRIPTION RATES - 6 issues per year 



USA 
Bulk mail - $15.00 
First Class Mail -$21.00 
Overseas airmail - $27.00 



Canada 
Mexico 
APO/FPO , 
Overseas surfj 




, *Q Check/Money Order enclosed, Master Charge 

SIGNATURE.. 
* ACCOU r4t # _JL_i_ 
EXP. DATE 



CITY 

Telephone orders accepted for Master Charge or VISA accounts. Call Monday through 
Friday, 9:30 to 5:30 EST at 603-673-5144 

PO BOX 68, MILFORD, NH 03055 
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ELECTRIC 
PCIICIL ! 



The Electric Pencil by Michael Shrayer 
is a true word-processing program for 
the TRS-80. Enter your manuscript, 
and let your computer do the work. 
Editing? Just position the cursor with the 
arrow keys . . . one-key commands let you 
change, delete, or insert. Fully 
adjustable margins, left/ right justifica- 
tion, variable spacing, page headings, 
and much more! Save and recall your text with tape or 
diskfiles. Typing everything 

from letters to reports is fast and Leve | M 16K tape -$100.00 
incredibly easy using The Disk version -$150.00 
Electric Pencil. 




T*S 



TRS-0O Software Exchange 

Milford, New Hampshire 03055 



PROG/80 

PO Box 68 Milford, NH 03055 
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